Further examples of harmonic oscillation

[Analog_Engine.git] / scripts / EP1 10.01 Damped Harmonic Oscillator.LACE

diff --git a/scripts/EP1 10.01 Damped Harmonic Oscillator.LACE b/scripts/EP1 10.01 Damped Harmonic Oscillator.LACE
new file mode 100644 (file)
index 0000000..0f03c01
--- /dev/null
+++ b/scripts/EP1 10.01 Damped Harmonic Oscillator.LACE
@@ -0,0 +1,19 @@
+# Damped_Oscillator
+# phi'' = -(S*phi + D/m*phi')
+
+coefficient.1(-1) -> -phi0   # Initial Amplitude
+coefficient.3     -> S     # SpringForce
+coefficient.4     -> D/m   # Damping linear to speed
+
+iintegrate phi'' -> -phi'
+invert -phi' -> phi'
+cmultiply phi', D/m -> D/m*phi'
+
+iintegrate -phi' -> phi
+  IC: -phi0
+cmultiply S, phi -> S*phi
+
+isum 10:S*phi, D/m*phi' -> -(Sphi+D/mphi')
+assign -(Sphi+D/mphi') -> phi''
+
+output(y) -> out.y